|   File        : Desktop
|   Date        : 12-Jun-99
|   Author      :  A.Thoukydides, 1998, 1999
|   Description : Script to load and configure PsiFS from within the desktop.

| Check that there is sufficient memory to run
WimpSlot -min 116K -max 116K

| Directory to contain scrap files
If "<Wimp$ScrapDir>" = "" Then Error 0 Scrap folder could not be found. Please double-click on a copy of !Scrap and try again.
If "<Wimp$Scrap>" = "" Then Set Wimp$Scrap <Wimp$ScrapDir>.ScrapFile
Set PsiFSScrap$Dir <Wimp$ScrapDir>.PsiFS

| Directory to contain configuration files
If "<Choices$Write>" = "" Then Set PsiFSConfig$Dir <PsiFS$Dir>.Config Else Set PsiFSConfig$Dir <Choices$Write>.PsiFS
Set PsiFSConfig$Path <PsiFS$Dir>.Config.
If "<Choices$Write>" <> "" Then Set PsiFSConfig$Path <Choices$Write>.PsiFS.,<PsiFSConfig$Path>
If "<Choices$Path>" <> "" Then Set PsiFSConfig$Path Choices:PsiFS.,<PsiFSConfig$Path>

| Load the PsiFS module if required
RMEnsure PsiFS 1.10 Run <PsiFS$Dir>.Resources.Load
RMEnsure PsiFS 1.10 Error 0 Failed to load the PsiFS module

| Ensure that the correct versions of system modules are loaded
Run <PsiFS$Dir>.Resources.Ensure MessageTrans 0.27 MsgTrans
Run <PsiFS$Dir>.Resources.Ensure ColourTrans  0.52 Colours
Run <PsiFS$Dir>.Resources.Ensure Toolbox      1.36 Toolbox.Toolbox
Run <PsiFS$Dir>.Resources.Ensure DCS          1.06 Toolbox.DCS_Quit
Run <PsiFS$Dir>.Resources.Ensure Iconbar      1.12 Toolbox.IconBar
Run <PsiFS$Dir>.Resources.Ensure Menu         0.24 Toolbox.Menu
Run <PsiFS$Dir>.Resources.Ensure ProgInfo     0.09 Toolbox.ProgInfo
Run <PsiFS$Dir>.Resources.Ensure SaveAs       0.12 Toolbox.SaveAs
Run <PsiFS$Dir>.Resources.Ensure Window       1.31 Toolbox.Window

| Check again that there is sufficient memory to run
WimpSlot -min 116K -max 116K

| Start the desktop filer
Run <PsiFS$Dir>.Resources.!RunImage